From 4c13ae4a4f5ec5e13f313fca8f89c48be08429ae Mon Sep 17 00:00:00 2001 From: Glenn Morris Date: Tue, 3 Feb 2009 04:07:55 +0000 Subject: [PATCH] (rmail-get-summary-labels): Treat empty labels as null. --- lisp/mail/rmailsum.el | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) diff --git a/lisp/mail/rmailsum.el b/lisp/mail/rmailsum.el index eb202721353..5c250039c30 100644 --- a/lisp/mail/rmailsum.el +++ b/lisp/mail/rmailsum.el @@ -426,7 +426,9 @@ Returns nil if there are no labels. The current buffer must already be narrowed to the message headers for the message being processed." (let ((labels (mail-fetch-field rmail-keyword-header))) - (if labels (format "{ %s } " labels)))) + (and labels + (not (string-equal labels "")) + (format "{ %s } " labels)))) (defun rmail-create-summary (msgnum deleted unseen lines) "Return the summary line for message MSGNUM. -- 2.30.2